#!
use strict;
use File::Copy;
#copy self to the upper dir
copy($0,"..") || die "copy failed!";